home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / dev / gcc / ixemul_src.lha / ixemul-41.0 / stack / sub_d0_sp.c < prev    next >
C/C++ Source or Header  |  1995-05-23  |  361b  |  30 lines
  1. #include <stabs.h>
  2. #include <bases.h>
  3.  
  4. asm("
  5.     .text
  6.     .even
  7.     .globl    ___sub_d0_sp
  8.     .globl    ___unlk_a5_rts
  9.  
  10. ___sub_d0_sp:
  11.     movel    sp@+,a0
  12.     movel    sp,d1
  13.     subl    d0,d1
  14.     cmpl    "A4(___stk_limit)",d1
  15.     jcc    l0
  16.     jbsr    ___stkext
  17. l0:    subl    d0,sp
  18.     jmp    a0@
  19.  
  20. ___unlk_a5_rts:
  21.     movel    d0,a0
  22.     movel    a5,d0
  23.     jbsr    ___stkrst
  24.     movel    a0,d0
  25.     movel    sp@+,a5
  26.     rts
  27. ");
  28.  
  29. ALIAS(__move_d0_sp,__stkrst);
  30.